home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 102 / CD-ROM 102.iso / aplic / 2sync / 2SyncSetup.exe / base / scripts / DefineSprite_18 / frame_10 / DoAction.as
Encoding:
Text File  |  2002-03-20  |  3.4 KB  |  112 lines
  1. play();
  2. setProperty("_level20/drag", _visible, "1");
  3. droptarget = getProperty("_level20/drag", _droptarget);
  4. panel = droptarget.substr("10","2");
  5. droppanel = panel;
  6. module = droptarget.substr("13","2");
  7. if("1" < getProperty("_level20/tr/tr", _currentframe) and droptarget ne "_level20/tr")
  8. {
  9.    tellTarget("_level20/tr/tr")
  10.    {
  11.       gotoAndStop(1);
  12.    }
  13. }
  14. if(droptarget.substr(length(droptarget) - "2",length(droptarget)) eq "ole" or droptarget eq "_level20/tr/ole")
  15. {
  16.    path = droptarget.substr("1",length(droptarget) - "4");
  17.    drop = eval(path add ":drop");
  18.    noSnap = eval(path add ":noSnap");
  19.    drag = eval("_level20/drag:drag");
  20.    barname = eval("_level20/drag:barname");
  21.    dragpanel = eval("_level20/drag:dragpanel");
  22.    if(drag ne "" and drop ne "")
  23.    {
  24.       dragtest = eval("matrix" add drop).substr(drag,"1");
  25.    }
  26.    else
  27.    {
  28.       dragtest = "0";
  29.    }
  30.    if(dragtest == "1")
  31.    {
  32.       if(path.substr(length(path) - "3","4") eq "/bar")
  33.       {
  34.          path = path.substr("1",length(path) - "4");
  35.       }
  36.       tellTarget("_level20/drag")
  37.       {
  38.          gotoAndStop("drop");
  39.       }
  40.       if(noSnap != "1")
  41.       {
  42.          object = eval(path.substr("1","15") add "codelib:object");
  43.          if(path eq "_level15/" add panel add "/nt/newnote" or drop == "19")
  44.          {
  45.             ObjectoffsetX = "0";
  46.             ObjectoffsetY = "0";
  47.          }
  48.          else if(path eq "_level15/" add panel add "/nt/details/tempdetailsbar")
  49.          {
  50.             object = "_level15/" add panel add "/nt/details";
  51.             ObjectoffsetX = getProperty(object, _X);
  52.             ObjectoffsetY = getProperty(object, _Y);
  53.          }
  54.          else if(path eq "_level15/" add panel add "/mc/details/tempdetailsbar")
  55.          {
  56.             ObjectoffsetX = getProperty(object, _X);
  57.             ObjectoffsetY = getProperty(object, _Y) + "1";
  58.          }
  59.          else
  60.          {
  61.             ObjectoffsetX = getProperty(object, _X);
  62.             ObjectoffsetY = getProperty(object, _Y);
  63.          }
  64.          if(drop eq "31" and path eq "_level20/tr")
  65.          {
  66.             setProperty("_level20/drag", _visible, "0");
  67.             tellTarget("_level20/tr/tr")
  68.             {
  69.                gotoAndStop(17);
  70.             }
  71.          }
  72.          else
  73.          {
  74.             setProperty("_level20/drag", _visible, "1");
  75.          }
  76.          setProperty("_level20/drag", _X, getProperty("_level15/" add panel, _X) + getProperty(path, _X) + eval("_level0/data:modulex") + getProperty("_level20/drag", _width) / "2" + ObjectoffsetX);
  77.          setProperty("_level20/drag", _Y, getProperty("_level15/" add panel, _Y) + getProperty(path, _Y) + eval("_level0/data:moduley") + getProperty("_level20/drag", _height) / "2" + ObjectoffsetY);
  78.       }
  79.       if(soundonce ne "1")
  80.       {
  81.          set("_level40/sound/lib:sound","283");
  82.          call("_level40/sound/lib:play");
  83.          soundonce = "1";
  84.       }
  85.       nodrop = "0";
  86.    }
  87.    else
  88.    {
  89.       nodrop = "1";
  90.       tellTarget("_level20/drag")
  91.       {
  92.          gotoAndStop("nodrop");
  93.       }
  94.       if(soundonce ne "1")
  95.       {
  96.          set("_level40/sound/lib:sound","284");
  97.          call("_level40/sound/lib:play");
  98.          soundonce = "1";
  99.       }
  100.    }
  101. }
  102. else
  103. {
  104.    nodrop = "1";
  105.    tellTarget("_level20/drag")
  106.    {
  107.       gotoAndStop("clear");
  108.    }
  109.    soundonce = "0";
  110. }
  111. noSnap = "0";
  112.